lisp/dired.el (dired-insert-directory): Revert change in revno:113117.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2fa58e8b2d2b2e420103861e56e01746c4401658..3ec4e655248c80cf208af1d3df3739d8794019ea 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-08-06  Juanma Barranquero  <lekktu@gmail.com>
+
+       * dired.el (dired-insert-directory): Revert change in revno:113117
+       to use looking-at-p instead of looking-at.  (Bug#15028)
+
 2013-08-05  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        Revert introduction of isearch-filter-predicates (bug#14714).

diff --git a/lisp/dired.el b/lisp/dired.el
index c44cf5748896ab2096c272ecd357540ea9347fdb..48f1b463f4acf54aacf4d1807f5631872eb07069 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -1225,7 +1225,7 @@ see `dired-use-ls-dired' for more details.")
       (save-excursion
        (goto-char opoint)
        (when (and (or hdr wildcard)
-                  (not (and (looking-at-p "^  \\(.*\\):$")
+                  (not (and (looking-at "^  \\(.*\\):$")
                             (file-name-absolute-p (match-string 1)))))
          ;; Note that dired-build-subdir-alist will replace the name
          ;; by its expansion, so it does not matter whether what we insert